processArgs (x:xs) = tanslateFile x
processArgs []     = error "Usage: phaskell file.phs"
main  = do
        argv <- getArgs
        _ <- processArgs argv
        return ()
          
